home *** CD-ROM | disk | FTP | other *** search
/ Creative Computers / Creative Computers CD-ROM, Volume 1 (Legendary Design Technologies, Inc.)(1994).iso / shareware / telecom / term_4.1 / extras / rexx / nodedial.term < prev    next >
Text File  |  1994-11-17  |  764b  |  30 lines
  1. /* nodedial.term
  2.  
  3. Here's a little script I wrote because I kept hearing folks say NComm was so
  4. good because it could dial out of the nodelist and term couldn't.
  5.  
  6. This script puts the traplist.library into the ARexx libs list, get's a node
  7. number from the user, and then it has term dial the phone number associated
  8. with that address.
  9.  
  10. Install it as a Fast-Macro or as a function key with the command;
  11.  
  12. \anodedial.term
  13.  
  14. Written by Mike Fitzgerald <mrfitz@lcafe.lakes.trenton.sc.us>
  15.  
  16. */
  17.  
  18. options results
  19. addlib("traplist.library",0,-30,0)
  20. yourNLpath = "NodeList:"    /* set this for your system */
  21.  
  22. REQUESTSTRING prompt 'What Address to dial?'
  23. address =result
  24.  
  25.  
  26. call FindNode(address,telephone,yournlpath)
  27. numbers = result
  28. parse var numbers trash number
  29. dial number
  30.